object formCambiaQad: TformCambiaQad
  Left = 247
  Top = 251
  Width = 468
  Height = 100
  AutoSize = True
  Caption = 'Cambiar Cuadrilla'
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'Courier New'
  Font.Style = []
  Icon.Data = {
    0000010001001818000001001800480700001600000028000000180000003000
    0000010018000000000020070000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000C9762B8E40198E40198E40198E40198E40198E40
    198E40198E40198E40198E40198E40198E40198E40198E40198E40198E40198E
    40198E40198E40198E4019000000000000000000C9762BF8F3F1B7A293B7A293
    B7A293B7A293B7A293B7A293B7A293B7A293B7A293B7A293B7A293B7A293B7A2
    93B7A293B7A293B7A293B7A293B7A2938E4019000000000000000000C9762BFA
    F6F4F8F3F1F6F0EEF4EEEAF2EBE7F0E8E4EEE5E0ECE3DDEAE0DAE8DCD6E6D9D2
    E4D6CFE2D3CBE0D0C8DECDC4DCCAC0DBC9BFDBC9BFB7A2938E40190000000000
    00000000C9762BFCF9F800900000600000600000600000600000600000600000
    6000006000006000006000006000006000006000006000006000DBC9BFB7A293
    8E4019000000000000000000C9762BFEFCFB009000F7FFFFF7FFFF68A0C0F7FF
    FFF7FFFF68A0C0F7FFFFF7FFFFF7FFFFF7FFFFF7FFFF68A0C0F7FFFFF7FFFF00
    6000DCCAC0B7A2938E4019000000000000000000C9762BFFFFFF00900098C098
    98C09868A0C098C09898C09868A0C098C09898C09898C09898C09898C09868A0
    C098C09898C098006000DECDC4B7A2938E4019000000000000000000C9762BFF
    FFFF009000F7FFFFF7FFFF68A0C0F7FFFFF7FFFF68A0C0F7FFFFF7FFFFF7FFFF
    F7FFFFF7FFFF68A0C0F7FFFFF7FFFF006000E0D0C8B7A2938E40190000000000
    00000000C9762BFFFFFF00900098C09898C09868A0C098C09898C09868A0C098
    C09898C09898C09898C09898C09868A0C098C09898C098006000E2D3CBB7A293
    8E4019000000000000000000C9762BFFFFFF009000F7FFFFF7FFFF68A0C0F7FF
    FFF7FFFF68A0C0F7FFFFF7FFFFF7FFFFF7FFFFF7FFFF68A0C0F7FFFFF7FFFF00
    6000E5D8D1B7A2938E4019000000000000000000C9762BFFFFFF00900098C098
    98C09868A0C098C09898C09868A0C098C09898C09898C09898C09898C09868A0
    C098C09898C098006000E7DBD4B7A2938E4019000000000000000000C9762BFF
    FFFF009000F7FFFFF7FFFF68A0C0F7FFFFF7FFFF68A0C0F7FFFFF7FFFFF7FFFF
    F7FFFFF7FFFF68A0C0F7FFFFF7FFFF006000E9DED8B7A2938E40190000000000
    00000000C9762BFFFFFF00900098C09898C09868A0C098C09898C09868A0C098
    C09898C09898C09898C09898C09868A0C098C09898C098006000EBE1DBB7A293
    8E4019000000000000000000C9762BFFFFFF009000F7FFFFF7FFFF68A0C0F7FF
    FFF7FFFF68A0C0F7FFFFF7FFFFF7FFFFF7FFFFF7FFFF68A0C0F7FFFFF7FFFF00
    6000EDE4DFB7A2938E4019000000000000000000C9762BFFFFFF009000009000
    0090000090000090000090000090000090000090000090000090000090000090
    00009000009000009000EFE6E2B7A2938E4019000000000000000000CB6D12FF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
    FEFCFBFCF9F8FAF6F4F8F3F1F6F0EEF3ECE9F1E9E5B7A2938E40190000000000
    00000000CB6D12FFFFFFFFFFFFFFFFFFFFFFFF00900000900000900000900000
    9000009000009000009000009000009000FAF6F4F8F3F1F6F0EEF4EEEAB7A293
    8E4019000000000000000000CB6D12FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFCFBFCF9F8FAF6F4F8
    F3F1F6F0EEF4EEEA8E4019000000000000000000CB6D12A24F22A24F22A24F22
    A24F22A24F22A24F22A24F22A24F22A24F22A24F22A24F22A24F22A24F22A24F
    22A24F22A24F22A24F22A24F22A24F22A24F22000000000000000000CB6D12D0
    6F01D06F01D06F01D06F01D06F01D06F01D06F01D06F01D06F01D06F01D06F01
    D06F01D06F01D06F01D06F01D06F01D06F01D06F01D06F01A24F220000000000
    00000000CB6D12ED9733ED9733ED9733ED9733ED9733ED9733ED9733ED9733ED
    9733ED9733ED9733ED9733ED9733F6CA9AF3AD61F6CA9AF3AD61306DF97F7488
    DA7B0D000000000000000000000000DA7B0DDA7B0DDA7B0DDA7B0DDA7B0DDA7B
    0DDA7B0DDA7B0DDA7B0DDA7B0DDA7B0DDA7B0DDA7B0DDA7B0DDA7B0DDA7B0DDA
    7B0DDA7B0DDA7B0D000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000FFFF
    FF00C0000100C0000100C0000100C0000100C0000100C0000100C0000100C000
    0100C0000100C0000100C0000100C0000100C0000100C0000100C0000100C000
    0100C0000100C0000100C0000100C0000100E0000300FFFFFF00FFFFFF00}
  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 377
    Height = 73
    TabOrder = 3
  end
  object Button1: TButton
    Left = 384
    Top = 0
    Width = 75
    Height = 25
    Caption = 'Aceptar'
    Default = True
    TabOrder = 1
    OnClick = Button1Click
  end
  object cbxQad: TComboBox
    Left = 8
    Top = 8
    Width = 361
    Height = 24
    AutoDropDown = True
    Style = csDropDownList
    ItemHeight = 16
    TabOrder = 0
    OnChange = cbxQadChange
  end
  object Button2: TButton
    Left = 385
    Top = 31
    Width = 75
    Height = 25
    Caption = 'Cancelar'
    TabOrder = 2
    OnClick = Button1Click
  end
  object adoCnxQad: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Password="";User ID=Admin;Data ' +
      'Source=SCAR.mdb;Mode=Share Deny None;Extended Properties="";Jet ' +
      'OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDB:Da' +
      'tabase Password="";Jet OLEDB:Engine Type=5;Jet OLEDB:Database Lo' +
      'cking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Globa' +
      'l Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet OLE' +
      'DB:Create System Database=False;Jet OLEDB:Encrypt Database=False' +
      ';Jet OLEDB:Don'#39't Copy Locale on Compact=False;Jet OLEDB:Compact ' +
      'Without Replica Repair=False;Jet OLEDB:SFP=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 72
    Top = 40
  end
  object adoQad: TADOQuery
    Connection = adoCnxQad
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'Select q.id,(trim(cuadrilla)+" ("+c.contratista+")") as Cuadrill' +
        'a'
      
        'from cuadrillas q inner join contratistas c on q.contratistaid=c' +
        '.id')
    Left = 8
    Top = 40
  end
  object dsQad: TDataSource
    DataSet = adoQad
    Left = 40
    Top = 40
  end
end
